home *** CD-ROM | disk | FTP | other *** search
/ CSi Master: Ableton Live 5 / CSi Master: Ableton Live 5.iso / pc / rsrc / locrsrc / mtprsrc.dir / Internal_14_setupTopics, setupMovieNames.ls < prev    next >
Encoding:
Text File  |  2005-10-31  |  757 b   |  24 lines
  1. on setupTopics source
  2.   global gLang
  3.   put " " into field (gLang & "subtopics (A)")
  4.   the itemDelimiter = ";"
  5.   repeat with n = 1 to the number of items in line 2 of source - 1
  6.     put item n of line 2 of source into line n of field (gLang & "Subtopics (A)")
  7.   end repeat
  8.   the itemDelimiter = ","
  9. end
  10.  
  11. on setupMovieNames source
  12.   global gLang
  13.   the itemDelimiter = ";"
  14.   repeat with n = 1 to the number of items in line 2 of source - 1
  15.     put " " into field (gLang & "sub-subtopics (a" & n & ")")
  16.     y = 1
  17.     repeat with x = 1 to the number of items in line n + 4 of source / 2
  18.       put item y of line n + 4 of source into line x of field (gLang & "sub-subtopics (a" & n & ")")
  19.       y = y + 2
  20.     end repeat
  21.   end repeat
  22.   the itemDelimiter = ","
  23. end
  24.